function map = Curl_cb(m)
%TURBO   Turbo colormap.
%   TURBO(M) returns an M-by-3 matrix containing the turbo colormap, a
%   variant of the jet colormap that is more perceptually uniform.
%
%   See also JET, COLORMAP.
if nargin < 1
   f = get(groot,'CurrentFigure');
   if isempty(f)
      m = size(get(groot,'DefaultFigureColormap'),1);
   else
      m = size(f.Colormap,1);
   end
end
r = imread('Curl_cb.jpg');
r = r(15,:,:);
r = squeeze(r);
r = double(r);
values = r/255;
P = size(values,1);
map = interp1(1:P, values, linspace(1,P,m), 'linear');
end
